home *** CD-ROM | disk | FTP | other *** search
/ Quake Busters / QUAKE.bin / pc / shared.dir / 00853_Script_(Sp) Volume control < prev    next >
Text File  |  1996-06-10  |  358b  |  16 lines
  1. -- will compute sound volume
  2.  
  3.  
  4. on mouseDown
  5.   set the constraint of sprite 42 to 43 
  6. end
  7.  
  8. on mouseUp
  9.   set a = the locH of sprite 41
  10.   set b = the mouseH
  11.   set c = b - a
  12.   set d = (c * 7 / 145) + 4 -- orig position of vol control is
  13.   put d                     -- in middle thus plus ab.half of 7
  14.   set the soundLevel to d
  15.   beep
  16. end mouseUp